#!/usr/bin/perl

package MyOptions;
use Moose;
with 'Config::System::MooseX::Getopt';
has some_option => (is => 'rw', isa => 'Str');

package main;
use strict;
use warnings;
use lib '../lib';
$|=1;

use Config::System ;
use Foo;

my $options = MyOptions->new_with_options;
print "some_option is: [". $options->some_option. "]\n";

Foo->new->do_something;

# to make properties overridable from CLI just 'with'
# Config::System::MooseX::Getopt instead of MooseX::Getopt

# prints Verbose is [X], where X is whatever the command line option
# for Foo::Verbose was
# so called like this: cli_override.pl -set Foo::Verbose=0 -some_option foo
# Verbose will be 0
